www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminHTML\D_E_do_htm_danartc.asp

    <%


'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="../css.css" type=text/css rel=stylesheet>
<%

dir_set="../../"


%>


<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->

<!--#include file=../../inc/ajaxLIB.asp-->

<!--#include file=../inc/checkadmin2.asp-->

<!--#include file=../../inc/functionFiless.asp-->

<!--#include file=../../inc/ND_class_function.asp-->


<!--#include file=inc_lanmu_ble.asp-->

<!--#include file=makehtm_inc/clsCachea.asp-->


<%
is_cmsa=1

if cstr(request("isqiye")&"")="1" then
is_cmsa=0
end if


Set myCache=new clsCache_b
CacheTemp="nd_htm_"
   myCache.name=CacheTemp & "nd_cid_var_name"
   Call myCache.clean()
         myCache.add request("cnnn"),Dateadd("h",2999,now())
		 
      myCache.name=CacheTemp & "nd_pdid_var_name"
   Call myCache.clean()
         myCache.add request("cnnnn"),Dateadd("h",2999,now())
		
		
      'myCache.name=CacheTemp & "nd_arid_var_name"
   'Call myCache.clean()
       '  myCache.add request("arnnn"),Dateadd("h",2999,now())
		
    '  myCache.name=CacheTemp & "nd_zid_var_name"
 '  Call myCache.clean()
         'myCache.add request("znnn"),Dateadd("h",2999,now())
		
								
		
set myCache=nothing




dowhata=cstr(request("dowhat"))
sys_content_type=trim(request("sys_content_type"))




if dowhata="10" then


response.redirect "D_goto_make_all_htm.asp?isqiye="&request("isqiye")
response.end
end if



if dowhata="11" then


response.redirect "D_goto_make_all_htm_by_conutiue.asp?isqiye="&request("isqiye")
response.end
end if




if dowhata="7" then
pageaa="$page$dan_Article_index_page$"
pageaa=replace_webfiles_names(pageaa,is_cmsa)
response.redirect "D_goto_make_danpage_htm.asp?cids="&sys_content_type&"&page="&pageaa&"&func=danartc"&"&isqiye="&request("isqiye")
response.end
end if

if dowhata="9" then
pageaa="$page$main_index_page$"
pageaa=replace_webfiles_names(pageaa,is_cmsa)
response.redirect "D_goto_make_danpage_htm.asp?cids="&sys_content_type&"&page="&pageaa&"&func=indexpage"&"&isqiye="&request("isqiye")
response.end
end if





%>